perm filename U11SAF[1,BGB] blob
sn#139437 filedate 1975-01-11 generic text, type T, neo UTF8
00800 /NOTATION:
00900 / 1. MICRO ROUTINES BEGIN WITH A COMMENT PREFIXED BY "*".
01000 / 2. ALL OTHER COMMENTS ARE PREFIXED BY SLASH "/".
01100 / 3. R[N] REFERS TO SCRATCH PAD REGISTER N,
01200 / R[7] IS ALSO REFERRED TO AS "PC".
01300 / 4. R[S] REFERS TO THE REGISTER SPECIFIED IN THE SOURCE FIELD
01400 / OF THE CURRENT INSTRUCTION, IR<8:6>
01500 / R[D] REFERS TO THE REGISTER SPECIFIED IN THE DESTINATION FIELD
01600 / OF THE CURRENT INSTRUCTION, IR<2:0>
01700 / 5. K[N] REFERS TO A LOCATION OF THE CONSTANTS CHIP THAT CONTAINS N.
01800 / 6. "BUT" STANDS FOR "BRANCH ON MICRO TEST".
01900
02000 LOC NXT * INSTRUCTION FETCH
02100 062 053 F-1 BA←PC; DATI
02200 053 365 F-2 B←PC+2
02300 365 364 F-3 PC←B; CKOFF
02400 364 061 F-4 B,IR←UNIBUS DATA
02500 061 001 F-5 B←B SEX; BUT IR DECODE
02600
02700 / IF DOUBLE OP INST GOTO S0-1 THRU S7-1 DEPENDING ON SOURCE MODE
02800 / IF SINGLE OP INST GOTO D0-1 THRU D7-1 DEPENDING ON DESTINATION MODE (INCLUDING JSR)
02900 / IF BRANCH, CHANGE PC GOTO B-1
03000 / IF BRANCH, PC UNCHANGED GOTO B2-2
03100 / IF CLEAR OR SET COND CODE(S) GOTO CCM-1
03200 / IF INST=RTS GOTO R1-1
03300 / IF INST=RTI GOTO R2-1
03400 / IF INST=WAIT GOTO W-1
03500 / IF INST=HALT GOTO H-1
03600 / IF INST=RESET GOTO RST-1
03700 / IF INST=EMT GOTO ET-1
03800 / IF INST=BPT GOTO BT-1
03900 / IF INST=IOT GOTO IT-1
04000 / IF INST=TRAP GOTO T-1
04100 / IF RESERVED INSTRUCTION (NONE OF THE ABOVE) GOTO RT-1